' Textfont
' This program demonstrates using a FOR loop and the TEXTFONT
'   statement to show different text faces.

CLS

FOR i% = 0 TO 10
    TEXTFONT i%
    PRINT "This is TEXTFONT number"; i%
NEXT i%

INPUT "Press Return to continue", dummy$
